home *** CD-ROM | disk | FTP | other *** search
/ Dr. Windows 3 / dr win3.zip / dr win3 / VISUALBA / BOZOL2.ZIP / LOGIC.CMD < prev    next >
OS/2 REXX Batch file  |  1994-02-08  |  304b  |  14 lines

  1.         CASE "IF"
  2.             A%=VAL(POPARG$)
  3.                 IF A%=0 THEN ExitFlag%=-1
  4.  
  5.     CASE "WHILE"
  6.             A%=VAL(POPARG$)
  7.                 IF A%=0 THEN ExitFlag%=-1 ELSE RepeatFlag%=-1
  8.  
  9.     CASE "UNTIL"
  10.             a%=VAL(POPARG$)
  11.                 IF A%=0 THEN RepeatFlag%=-1 ELSE ExitFlag%=-1
  12.  
  13.  
  14.